* lisp/progmodes/xref.el (xref-query-replace-in-results): Fix prefix-arg.

Use current-prefix-arg.

diff --git a/lisp/progmodes/xref.el b/lisp/progmodes/xref.el
index a1e976cb1cc494254e0d3d86d4d27372922fd8b3..066c051cfc3415be2fcb61ca34e910213d410712 100644 (file)
--- a/lisp/progmodes/xref.el
+++ b/lisp/progmodes/xref.el
@@ -745,10 +745,10 @@ replace the whole name.  Unless called with prefix argument, in
 which case the user is prompted for both FROM and TO."
   (interactive
    (let* ((fr
-           (if prefix-arg
+           (if current-prefix-arg
                (read-regexp "Query-replace (regexp)" ".*")
              ".*"))
-          (prompt (if prefix-arg
+          (prompt (if current-prefix-arg
                       (format "Query-replace (regexp) %s with: " fr)
                     "Query-replace all matches with: ")))
      (list fr (read-regexp prompt))))